home *** CD-ROM | disk | FTP | other *** search
/ MACD 5 / MACD 5.bin / internet / irc_i_dodatki / kuang / kuangeleven28.lha / Rexx / Pinkybrain.amirx < prev    next >
Text File  |  1996-12-30  |  3KB  |  97 lines
  1. /*                                                                            */
  2. /*                        Pinky & Brain Script 1.0                            */
  3. /*           Stolen from "Slack" and rewritten by K. Stenström                */
  4. /*                          (crissy@tripnet.se)                               */
  5. /*                                                                            */
  6. /*        Slack is a script for ircII put together by Rev. Krusty             */
  7. /*                        (rkrusty@primenet.com)                              */
  8. /*                                                                            */
  9. /* Fixed by Ariel to accept channel and number as arguments                   */
  10. /*                  Part of Kuang Eleven v2 AmIRC distribution                */
  11.  
  12. options results
  13.  
  14. PARSE ARG nick channel rand .
  15.  
  16. IF nick = "" THEN DO
  17.     "ECHO P=«piNkY» Usage: piNkY [NiCk] <ChANnEl> <NuM>"
  18.     EXIT
  19. END
  20. IF channel = "" THEN DO
  21.     "GETCHANNEL"
  22.     channel=result
  23. END
  24. IF rand = "" THEN DO
  25.     seed = Time(secs)
  26.     rand = Random(1,11,seed)
  27. END
  28. /******************************************************************************/
  29.  
  30. IF rand = 1 THEN DO
  31.     "SAY "nick" asks: are you pondering what i'm pondering?"
  32.     "SAY /kick "channel nick" Uh, I think so, "nick", but where will we find a duck and a hose at this hour?"
  33.     EXIT
  34. END
  35.  
  36. IF rand = 2 THEN DO
  37.     "SAY "nick" asks: are you pondering what i'm pondering?"
  38.     "SAY /kick "channel nick" I think so, "nick", but where will we find an open tattoo parlor at this time of night?"
  39.     EXIT
  40. END
  41.  
  42. IF rand = 3 THEN DO
  43.     "SAY "nick" asks: are you pondering what i'm pondering?"
  44.     "SAY /kick "channel nick" Uh, I think so, "nick", but if we didn't have ears, we'd look like weasels."
  45.     EXIT
  46. END
  47.  
  48. IF rand = 4 THEN DO
  49.     "SAY "nick" asks: are you pondering what i'm pondering?"
  50.     "SAY /kick "channel nick" Uh... yeah, "nick", but where are we going to find rubber pants our size?"
  51.     EXIT
  52. END
  53.  
  54. IF rand = 5 THEN DO
  55.     "SAY "nick" asks: are you pondering what i'm pondering?"
  56.     "SAY /kick "channel nick" Uh, I think so, "nick", but balancing a family and a career..  oooh, it's all too much for me."
  57.     EXIT
  58. END
  59.  
  60. IF rand = 6 THEN DO
  61.     "SAY "nick" asks: are you pondering what i'm pondering?"
  62.     "SAY /kick "channel nick" Wuh, I think so, "nick", but isn't Regis Philbin already married?"
  63.     EXIT
  64. END
  65.  
  66. IF rand = 7 THEN DO
  67.     "SAY "nick" asks: are you pondering what i'm pondering?"
  68.     "SAY /kick "channel nick" Uh, I think so, "nick", but burlap chafes me so."
  69.     EXIT
  70. END
  71.  
  72. IF rand = 8 THEN DO
  73.     "SAY "nick" asks: are you pondering what i'm pondering?"
  74.     "SAY /kick "channel nick" Sure, "nick", but how are we going to find chaps our size?"
  75.     EXIT
  76. END
  77.  
  78. IF rand = 9 THEN DO
  79.     "SAY "nick" asks: are you pondering what i'm pondering?"
  80.     "SAY /kick "channel nick" Uh, I think so, "nick", but we'll never get a monkey to use dental floss."
  81.     EXIT
  82. END
  83.  
  84. IF rand = 10 THEN DO
  85.     "SAY "nick" asks: are you pondering what i'm pondering?"
  86.     "SAY /kick "channel nick" Uh, I think so, "nick", but this time, you wear the tutu."
  87.     EXIT
  88. END
  89.  
  90. IF rand = 11 THEN DO
  91.     "SAY "nick" asks: are you pondering what i'm pondering?"
  92.     "SAY /kick "channel nick" I think so, "nick", but culottes have a tendency to ride up so."
  93.     EXIT
  94. END
  95.  
  96. EXIT
  97.